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Problem 

If you run SETUP and option for a revision, the revised information will 
not be stored under the appropriate filename. 


Solution 

The following routine can be used to change the name you assigned to the 
Mailing List systan (J«UIiING LIST 26-4506). With a BACKUP of your Mailing 
List in drive 0 , RUN the following program while in BASIC: 

10 CLEAR500:DEFIOTA-Z:DIMC$(7):CIiS:PRINT@1525,"This program allows you to 
change the Mailing List system name as is stored in the system 
information data file. You must rename all three Mailing List files 
after running this routine." 

20 PRINT@410,;:INPUT"£NIER THE CURRENT MAILING LIST SYSTEM 
NAME";F0$:QOSUB90 

30 PRINT@490,;:INPUT"EN1ER THE NEW MAIUJG LIST SYSTEM NAME";SN$:QOSUB50 
40 PRINT@985,"CHANGE COMPLETE":PRINT@1840,;:END 
50 OPEN"O",1,F0$ 

60 PRINr#l,SN$ :PRINT#1,NA$ :PRINr#l,TL$ :PRINT#1,AD$ :HIINT#1,CSZ$: 
PRINr#l,BM$ 

70 ERINT#1,CP;M;M0;M1;M3;M4;M5 ;M6 ;M7;M8 
80 EDRI=0TO7:PRINT#l,C$(I):NEXT:CIiOSEl:RETURN 
90 F0$=F0$+"0:0":OPEN"I",1,F0$ 

lJZr0 LINEINPUT#!, SN$: LINEINPUT#! ,NA$: LINEINPUT#! ,TL$: UNEINPUT#!,AD$ 

110 LINEINPUT#! ,CSZ$: LINEINPUT#! ,FM$ 

120 INPUT#1 ,CP,M,M0,M1,M2 ,M3 ,M4 ,M5 ,M6 ,M7 ,M8 

130 PCRI=0TO7:LINEINPUT#1,C$(I):NEXT;CLOSE1:RETURN 
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